home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1991 December / 64er_Magazin_91-12_1991_Markt__Technik_de_Side_A.d64 / listing 2 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1991-01-01  |  593 b   |  2 lines
  1. 29545 TING 2:
  2. SEI
  3. LDA  #<NEUIRQ
  4. LDX  #>NEUIRQ
  5. STA  $0314
  6. STX  $0315
  7. LDA  #$7F
  8. STA  $DC0D
  9. LDA  #$01
  10. STA  $D01A
  11. LDA  #$28
  12. STA  $D012
  13. LDA  $D011
  14. AND  #$7F
  15. STA  $D011
  16. LDA  #$00
  17. STA  $3FFF
  18. CLI
  19. RTS
  20.  
  21. :NEUIRQLDA  $D019
  22. STA  $D019
  23.  
  24. LDX  #$00
  25. LDA  #$19
  26. :WAITZEILECMP  $D012
  27. BCS  WAITZEILE
  28. LDY  #$0C
  29. :WAIT1DEY
  30. BNE  WAIT1
  31. LDA  #$10
  32. STA  $D011
  33. LDY  #$23
  34. :WAIT2DEY
  35. BNE  WAIT2
  36. BIT  $C0
  37. BIT  $C0
  38. :LABELLDY  $D012
  39. DEY
  40. TYA
  41. AND  #$07
  42. ORA  #$10
  43. STA  $D011
  44. LDA  #06
  45. STA  $D021
  46. LDA  #01
  47. STA  $D021
  48. LDA  #02
  49. STA  $D021
  50. LDA  #01
  51. STA  $D021
  52. LDA  #06
  53. STA  $D021
  54. INX
  55. CPX  #$64
  56. BNE  LABEL
  57. LDA  #$00
  58. STA  $D021
  59. JMP  $EA81
  60.  
  61.